home *** CD-ROM | disk | FTP | other *** search
- DefineVariables
- Number [ErrCount]
- Directory [windir]
- Directory [winsdir]
- Logical [EnKeyb]
- Logical [NetAvail]
- Logical [MathPres]
- Logical [CDAvail]
- Text [DispType]
- Number [XMSAvail]
- Number [ExtmemPagesActive]
- Number [ExtmemPagesAvail]
- Number [ExtMemAvail]
- Number [ExtMemPres]
- Number [ExpMempgavail]
- Number [ExpMempgactive]
- Text [osver]
- Text [DosVer]
- Text [EmsVer]
- Text [ProdExecutable]
- Text [InstDir]
- TextArray [Array1]
- EndDefineVariables
- [EnKeyb] := NoCharacter
- [NetAvail] := NoCharacter
- [MathPres] := NoCharacter
- [CDAvail] := NoCharacter
- Do SetupDisplay
- Do CheckHardware
- if [errcount] > 1
- Dialog UseHeader "Encountered Some Problems" LightGrayOnBlue
- Our installation has encounterd the following problems,
- you can continue to install or exit installation.
- [Array1][1]
- [Array1][2]
- [Array1][3]
- [Array1][4]
- [Array1][5]
- [Array1][6]
- [Array1][7]
- EndDialog
- endif
-
- :start
- GetMenuChoice UseHeader "Cirrus Logic GD7548 DOS Util. & Driver Install 1.20"
- VGA Utilities
- AutoCAD 386 v11 Multi-res Multi-color
- AutoCAD 386 v12 Multi-res Multi-color
- AutoDesk 3D Studio v1.0,2.0 Multi-res Multi-color
- AutoShade with RenderMan v2.0 Multi-res Multi-color
- Exit Installation
- EndGetMenuChoice
- :start
- InCase Choice is
- =1: Do InstallUtil
- =2: Do Installa11
- =3: Do Installa12
- =4: Do Install3d
- =5: Do Installshade
- =6: SoLong
- EndIncase
- goto start
- Procedure SetupDisplay
- ;;SetBackGroundCharTO b0
- SetBackGroundCharTO b1
- ;;SetPopupAttrTo LightGrayOnBlue
- SetPopupAttrTo WhiteOnGreen
- EndProcedure
- ;; acad 11
- Procedure Installa11
- DetermineInstallationDrive
- DetermineInstallationDirectory InstallationDrive:\
- ;;QueAllFiles
-
- QueFiles
- DLDEXT.RLM
- FONT0715.DLD
- FONT0814.DLD
- FONT1220.DLD
- TURBODLD.HLP
- RCTURBOC.EXP
- READ.ME
- EndQueFiles
-
- GetQuedFiles ShowJustOne
-
- DeleteFiles from [InstallationDirectory] Quietly
- fastacad.bat
- EndDeleteFiles
-
- CreateFile [InstallationDirectory]\fastacad.bat
- AppendFile [InstallationDirectory]\fastacad.bat
- SET DLDCFG=[InstallationDirectory]
- SET DSPADI=[InstallationDirectory]\RCTURBOC.EXP
- SET RDPADI=[InstallationDirectory]\RCTURBOC.EXP
- SET RCPADI=[InstallationDirectory]\RCTURBOC.EXP
- EndAppendFile
-
- Dialog WhiteOnRed
- 1. Run FASTACAD.BAT in [InstallationDirectory] to set the environment.
- 2. Reconfigure your ACAD video display according to ACAD manual.
- EndDialog
- EndProcedure
-
- ;; acad 12
- Procedure Installa12
- DetermineInstallationDrive
- Dialog WhiteOnRed
- We recommend that you install TURBODLD into the AutoCAD DRV subdirectory.
- To do that, on the next screen, enter the directory name where you have
- installed the AutoCAD application.
-
- EndDialog
-
- DetermineInstallationDirectory InstallationDrive:\ NoCreate
-
- ;;If DirectoryIsEmpty [InstallationDirectory]
- ;;If FileExists [InstallationDirectory]\*.exp
- If DirectoryExists [InstallationDirectory]\DRV
- ;;QueAllFiles
- [InstallationDirectory] := [InstallationDirectory]\DRV
- QueFiles [InstallationDirectory]
- DLDEXT.RLM
- FONT0715.DLD
- FONT0814.DLD
- FONT1220.DLD
- TURBODLD.HLP
- RCTURBOC.EXP
- READ.ME
- EndQueFiles
- GetQuedFiles ShowJustOne
- Dialog WhiteOnRed
- Reconfigure your video display by running ACADR12.BAT. (ie. C:\>acadr12 -r)
- ACADR12.BAT was created after the ACAD installation.
- EndDialog
- else
- ;;QueAllFiles
- QueFiles [InstallationDirectory]
- DLDEXT.RLM
- FONT0715.DLD
- FONT0814.DLD
- FONT1220.DLD
- TURBODLD.HLP
- RCTURBOC.EXP
- READ.ME
- EndQueFiles
- GetQuedFiles ShowJustOne
- Dialog WhiteOnRed
- 1. You must edit the ACADDRV environment variables in ACADR12.BAT.
-
- e.g. Set ACADDRV=C:\ACAD\DRV;[InstallationDirectory]
-
- 2. Reconfigure your video display by running "acadr12 -r" according to the
- AutoCAD user's guide.
- EndDialog
- Endif
-
- EndProcedure
- ;; end installa12
-
- ;; 3D studio
- Procedure Install3d
- DetermineInstallationDrive
- DetermineInstallationDirectory InstallationDrive:\
- ;;QueAllFiles
- QueFiles
- DLDEXT.RLM
- FONT0715.DLD
- FONT0814.DLD
- FONT1220.DLD
- TURBODLD.HLP
- RCTURBOC.EXP
- READ.ME
- EndQueFiles
- GetQuedFiles ShowJustOne
-
- DeleteFiles from [InstallationDirectory] Quietly
- pana3ds.bat
- EndDeleteFiles
-
- CreateFile [InstallationDirectory]\fastacad.bat
- AppendFile [InstallationDirectory]\fastacad.bat
- SET DLDCFG=[InstallationDirectory]
- SET RCPADI=[InstallationDirectory]\RCTURBOC.EXP
- EndAppendFile
-
- Dialog WhiteOnRed
- 1. Run PANA3DS.BAT in [InstallationDirectory] to set the environment.
- 2. You must edit the 3DS.SET according to the 3D user's guide.
- 3. Delete 3DADI.CFG in 3DS directory and run 3DS in configuration mode.
- EndDialog
- EndProcedure
-
-
- ;; autoshade 2
- Procedure Installshade
- DetermineInstallationDrive
- DetermineInstallationDirectory InstallationDrive:\
- ;;QueAllFiles
- QueFiles
- DLDEXT.RLM
- FONT0715.DLD
- FONT0814.DLD
- FONT1220.DLD
- TURBODLD.HLP
- RCTURBOC.EXP
- READ.ME
- EndQueFiles
- GetQuedFiles ShowJustOne
-
- DeleteFiles from [InstallationDirectory] Quietly
- fastacad.bat
- EndDeleteFiles
-
- CreateFile [InstallationDirectory]\fastacad.bat
- AppendFile [InstallationDirectory]\fastacad.bat
- SET DLDCFG=[InstallationDirectory]
- SET DSPADI=[InstallationDirectory]\RCTURBOC.EXP
- SET RDPADI=[InstallationDirectory]\RCTURBOC.EXP
- SET RCPADI=[InstallationDirectory]\RCTURBOC.EXP
- EndAppendFile
-
- Dialog WhiteOnRed
- 1. Run FASTACAD.BAT in [InstallationDirectory] to set the environment.
- 2. Reconfigure AutoShade by typing "SHADE2 -r" assuming that SHADE2 is
- a batch file that was created by AutoShade installation.
- EndDialog
- EndProcedure
-
- ;; Install VGA Utilities
- Procedure InstallUtil
- DetermineInstallationDrive
- DetermineInstallationDirectory InstallationDrive:\
- QueFiles
- CLMODE.EXE
- CLMODE.LS
- CLMODE.IT
- CLMODE.FR
- CLMODE.ES
- CLMODE.EN
- CLMODE.DE
- CLMODE.SV
- CLMODE.NL
- CLMODE.BR
- CLMODE.DA
- CLMODE.FI
- CLMODE.NR
- CLMODE.PR
- TIMINGS.DAT
- CLMODE.INI
- UCLMODE.EN
- LANG.DAT
- EndQueFiles
- GetQuedFiles ShowJustOne
-
- ;; Rename Japanese UCLMODE.* to JCLMODE.*
-
- ;;DeleteFiles from [InstallationDirectory] Quietly
- ;; JCLMODE.*
- ;;EndDeleteFiles
-
- ;;RenameFile [InstallationDirectory]\UCLMODE.EXE to JCLMODE.EXE
- ;;RenameFile [InstallationDirectory]\UCLMODE.JA to JCLMODE.JA
-
- EndProcedure
-
- Procedure CheckHardware
- [Number3] := 1
- if VGA
- [DispType] := VGA
- endif
- if [DispType] = BlankString
- [Array1][[number3]] := Your Display adapter must be EGA or better.
- IncrementNumber [number3]
- endif
- [windir] := [WindowsDirectory]
- [winsdir] := [WindowsSystemDirectory]
- [ExtmemPagesActive] := ExtendedMemoryPagesActive
- [ExtmemPagesAvail] := ExtendedMemoryPagesAvailable
- [ExtMemAvail] := ExtendedMemoryAvailable
- [ExtMemPres] := ExtendedMemoryPresent
- [ExpMempgAvail] := ExpandedMemoryPagesAvailable
- [ExpMempgActive] := ExpandedMemoryPagesActive
- [osver] := OSVersion
- [DosVer] := DOSVersion
- [EmsVer] := EMSVersion
- [Errcount] := [Number3]
- EndProcedure
- ;;
-
-